home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / tool_inc.zip / ITOU.INT < prev    next >
Text File  |  1989-06-02  |  152b  |  3 lines

  1. function i_to_ur(i: integer): real;  {integer to unsigned-real conversion}
  2. function ur_to_i(v: real): integer;  {unsigned-real to integer conversion}
  3.